function [T_order, T] = static_g1_tt(y, x, params, T_order, T)
if T_order >= 1
    return
end
[T_order, T] = P00hr.sparse.static_resid_tt(y, x, params, T_order, T);
T_order = 1;
if size(T, 1) < 16
    T = [T; NaN(16 - size(T, 1), 1)];
end
T(11) = getPowerDeriv(y(2),1-y(10),1);
T(12) = (log(y(2))*T(11)+T(2)*1/y(2))/(y(10)-1)+T(11)/T(3);
T(13) = getPowerDeriv(y(2),(-y(10)),1);
T(14) = getPowerDeriv(y(3),params(4),1);
T(15) = getPowerDeriv(y(5),1-params(4),1);
T(16) = ((y(10)-1)*log(y(2))*T(2)*(-log(y(2)))-T(2)*log(y(2)))/((y(10)-1)*(y(10)-1))+(T(3)*T(2)*(-log(y(2)))-(T(2)-1)*2*(y(10)-1))/(T(3)*T(3));
end
